Những câu hỏi liên quan
Anh Hoàng
Xem chi tiết
Nguyễn Lê Phước Thịnh
30 tháng 4 2022 lúc 21:58

uses crt;

var a:array[1..100]of real;

i,n:integer;

ln:real;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

for i:=1 to n do writeln(a[i]);

ln:=a[1];

for i:=1 to n do if ln<a[i] then ln:=a[i];

writeln(ln);

readln;

end.

Bình luận (0)
Hương Đinh
Xem chi tiết
Vương Hương Giang
2 tháng 3 2022 lúc 19:19

XEM HÌNH

imagerotate

Bình luận (0)
Hương Đinh
Xem chi tiết
Đỗ Đức Duy
2 tháng 3 2022 lúc 19:05

image

Bình luận (0)
ntrang
Xem chi tiết
Nguyễn Minh Quang
Xem chi tiết
Hoàng Anh Nguyễn
4 tháng 11 2021 lúc 22:36

dễ mà dài wa nhác ghi vkl

Bình luận (0)
Hoàng Anh Nguyễn
4 tháng 11 2021 lúc 22:37

ghi từng cái thoi dài wa khó nhìn đề

Bình luận (0)
Hoàng Anh Nguyễn
4 tháng 11 2021 lúc 22:49

.

Bình luận (0)
Lê thị Phương  anh
Xem chi tiết
Phía sau một cô gái
5 tháng 5 2023 lúc 20:45

n = int(input("Nhập số lượng học sinh trong lớp: "))

dtb = [ ]

for i in range(n):

      diem = float(input(f"Nhập điểm trung bình của học sinh thứ {i+1}: "))

      dtb.append(diem)

count = 0

for diem in dtb:

      if diem < 5:

            count += 1

print(f"Số lượng học sinh xếp loại chưa đạt là: {count}")

Bình luận (0)
11. Bùi Đắc Đông Lộc
Xem chi tiết
11. Bùi Đắc Đông Lộc
1 tháng 4 2022 lúc 18:52

Sus help me các step brother!

Bình luận (0)
Minh Lệ
1 tháng 4 2022 lúc 19:29

Program HOC24;

var Toan,Ly,Tin,TBMToan,TBMLy,TBMTin: real;

i,n: byte;

begin

write('Nhap so ban hoc sinh trong lop: '); readln(n);

for i:=1 to n do 

begin

write('Nhap diem Toan; Ly; Tin cua ban thu ',i,': ');

readln(Toan[i],Ly[i],Tin[i]);

end;

TBMToan:=0; TBMLy:=0; TBMTin:=0;

For i:=1 to n do 

begin

TBMToan:=TBMToan+Toan[i];

TBMLy:=TBMLy+Ly[i];

TBMTin:=TBMTin+Tin[i];

end;

writeln('Diem trung binh mon Toan la: ',TBMToan:5:1);

writeln('Diem trung binh mon Ly la: ',TBMLy:5:1);

writeln('Diem trung binh mon Tin la: ',TBMTin:5:1);

For i:=1 to n do

writeln('Diem trung binh 3 mon cua ban thu ',i,' la: ',TBMToan+TBMLy+TBMTin:5:1);

Readln

end.

Bình luận (0)
vangia than
Xem chi tiết
N           H
Xem chi tiết